
On *:JOIN:#: {
  Set %SpecList $read(SpecList.txt,s, $nick $+ )
  If ( %SpecList != $null ) {
    /mode # -v $nick

  }
}